100
How do I change the visual aspect for thumb parts in the scroll bars, using EBN

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
		.VisualAppearance.Add 3,"c:\exontrol\images\hot.ebn"
		.Background(388) = &H1000000
		.Background(389) = &H2000000
		.Background(391) = &H3000000
		.Background(260) = &H1000000
		.Background(261) = &H2000000
		.Background(263) = &H3000000
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

99
How do I change the visual aspect only for the thumb in the scroll bar, using EBN

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.VisualAppearance.Add 2,"c:\exontrol\images\pushed.ebn"
		.VisualAppearance.Add 3,"c:\exontrol\images\hot.ebn"
		.Background(388) = &H1000000
		.Background(389) = &H2000000
		.Background(391) = &H3000000
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

98
How to check whether the control hides the three-letter file-name extensions for certain files, reducing clutter in folder windows

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Option(4) = True
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

97
How can I change the date format in the Modified column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Option(2) = "yyyyy "
		.Option(3) = "hh:mm"
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

96
How can I change the date format in the Modified column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Option(2) = "ddd, MMM dd yy"
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

95
How can I change the format of the caption that's shown in the Modified column, if ModifiedDaysAgo property is used

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ModifiedDaysAgo = 356
		.Option(1) = "vor %i Tagen"
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

94
How can I change the "today" caption that's shown in the Modified column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ModifiedDaysAgo = 356
		.Option(0) = "__ new today __"
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

93
Is there any way to rename a column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnCaption("Name") = "__ new name __"
	End With
End Function
</SCRIPT>
</BODY>

92
Is there any option to exclude folders that match a pattern

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExcludeFolderFilter = "W*"
	End With
End Function
</SCRIPT>
</BODY>

91
Is there any option to include only folders that match a pattern

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.IncludeFolderFilter = "W*"
	End With
End Function
</SCRIPT>
</BODY>

90
How can I include files when folders are expanded

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.IncludeFilesInFolder = True
	End With
End Function
</SCRIPT>
</BODY>

89
How do I get the file or folder from the cursor
<BODY onload="Init()">
<SCRIPT LANGUAGE="VBScript">
Function ExFileView1_MouseMove(Button,Shift,X,Y)
	With ExFileView1
		alert( .FileFromPoint(-1,-1) )
	End With
End Function
</SCRIPT>

<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		alert( .FileFromPoint(-1,-1) )
	End With
End Function
</SCRIPT>
</BODY>

88
How can I expand programatically a folder

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.Expand "WINNT"
	End With
End Function
</SCRIPT>
</BODY>

87
Is there any option to remove the tooltip when the cursor hovers the column's drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.Description(2) = ""
		.Description(3) = ""
		.Description(4) = ""
		.Description(5) = ""
		.Description(6) = ""
	End With
End Function
</SCRIPT>
</BODY>

86
How can I change the "Filter For" caption in the column's drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.Description(1) = "new caption"
	End With
End Function
</SCRIPT>
</BODY>

85
How do I change the "All" caption in the drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.Description(0) = "new name for (All)"
	End With
End Function
</SCRIPT>
</BODY>

84
How do I sort a column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Sort "Name",False
	End With
End Function
</SCRIPT>
</BODY>

83
How do I change the font in the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarFont.Name = "Verdana"
	End With
End Function
</SCRIPT>
</BODY>

82
How do I change the visual appearanceof the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarBackColor = &H1000000
	End With
End Function
</SCRIPT>
</BODY>

81
How do I change the color in the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarBackColor = RGB(255,0,0)
	End With
End Function
</SCRIPT>
</BODY>

80
How do I change the color in the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarForeColor = RGB(255,0,0)
	End With
End Function
</SCRIPT>
</BODY>

79
How do I specify the height of the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarHeight = 32
	End With
End Function
</SCRIPT>
</BODY>

78
How do I remove or clear the filter
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.ClearFilter 
	End With
End Function
</SCRIPT>
</BODY>

77
How do I change the caption in the filter bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
		.FilterBarCaption = "new filter"
	End With
End Function
</SCRIPT>
</BODY>

76
How do I filter a column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe|*.com|*.bat"
		.ApplyFilter 
	End With
End Function
</SCRIPT>
</BODY>

75
How can I enlarge the height of the drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.FilterBarDropDownHeight = "-256"
	End With
End Function
</SCRIPT>
</BODY>

74
How do I remove or clear my own filters

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.AddColumnCustomFilter "Name","(Executable files)","*.exe|*.com|*.bat"
		.ClearColumnCustomFilters "Name"
	End With
End Function
</SCRIPT>
</BODY>

73
How do I specify my own filters

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.AddColumnCustomFilter "Name","(Executable files)","*.exe|*.com|*.bat"
	End With
End Function
</SCRIPT>
</BODY>

72
How can I enlarge the width of the drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.FilterBarDropDownWidth("Name") = 2
	End With
End Function
</SCRIPT>
</BODY>

71
How can I enlarge the width of the drop down filter window

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
		.FilterBarDropDownWidth("Name") = "-256"
	End With
End Function
</SCRIPT>
</BODY>

70
How can I enable filtering the folders and files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnFilterButton("Name") = True
	End With
End Function
</SCRIPT>
</BODY>

69
How do I display in the Modified column, the number of days since the file or folder was changed

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ModifiedDaysAgo = 356
	End With
End Function
</SCRIPT>
</BODY>

68
How do I stop programatically the searching
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.StopSearch 
	End With
End Function
</SCRIPT>
</BODY>

67
How do I search or find files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Search = "A*.A*"
	End With
End Function
</SCRIPT>
</BODY>

66
How can I expand or collapse a folder, when the user double clicks it

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.ExpandOnDblClk = True
	End With
End Function
</SCRIPT>
</BODY>

65
How can I change the default icon being displayed for parent folders

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.LoadIcon ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\week.ico`)"),1234
		.IncludeParentIconKey = 1234
	End With
End Function
</SCRIPT>
</BODY>

64
How can I show only folders

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.IncludeFiles = False
	End With
End Function
</SCRIPT>
</BODY>

63
How can I show or hide the expand/collapse buttons

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.HasLines = True
		.HasLinesAtRoot = True
		.HasButtons = False
	End With
End Function
</SCRIPT>
</BODY>

62
How can I show the lines at root

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.HasLines = True
		.HasLinesAtRoot = True
	End With
End Function
</SCRIPT>
</BODY>

61
How can I show the lines between child and parents

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
		.HasLines = True
	End With
End Function
</SCRIPT>
</BODY>

60
Is there any option to add an expand or collapse (+/-) buttons left to each folder

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExpandFolders = True
	End With
End Function
</SCRIPT>
</BODY>

59
How do I show or hide the first item that shows when I browse new folders

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.IncludeParent = False
	End With
End Function
</SCRIPT>
</BODY>

58
How do I enable or disable renaming the folders and files
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.AllowRename = True
	End With
End Function
</SCRIPT>
</BODY>

57
How do I change the width of the columns

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

56
How do I change the width of the columns

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

55
How do I show or hide a column

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnVisible("Type") = False
	End With
End Function
</SCRIPT>
</BODY>

54
How can I get the path of the browsed folder
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.BrowseFolderPath = "C:\Temp"
	End With
End Function
</SCRIPT>
</BODY>

53
The Change event is not fired. What can I do
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ChangeNotification = True
	End With
End Function
</SCRIPT>
</BODY>

52
How do I execute a command from the file's content menu (sample 1)

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.BeginUpdate 
		.ExploreFromHere = ""
		.ExecuteContextCommand "C:\",True,"Properties"
		.EndUpdate 
	End With
End Function
</SCRIPT>
</BODY>

51
How do I change the width of the columns

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

50
How can I refresh automatically the control so it reflect the changes in the browsed folder
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.AutoUpdate = True
	End With
End Function
</SCRIPT>
</BODY>

49
May I disable the control's content menu, that's displayed when the user does right click
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.AllowMenuContext = False
	End With
End Function
</SCRIPT>
</BODY>

48
How do I refresh the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

47
How do I enable single or multiple selection

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.SingleSel = False
	End With
End Function
</SCRIPT>
</BODY>

46
Can I display only all execpts the *.exe and *.com files using wild characters

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExcludeFilter = "*.exe *.com *.bat"
	End With
End Function
</SCRIPT>
</BODY>

45
Can I display only *.exe and *.com files using wild characters

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.IncludeFilter = "*.exe *.com *.bat"
	End With
End Function
</SCRIPT>
</BODY>

44
Can I change the folder being explored
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExploreFromHere = "c:\Program Files"
	End With
End Function
</SCRIPT>
</BODY>

43
Can I display only files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.IncludeFolders = False
	End With
End Function
</SCRIPT>
</BODY>

42
How can I change the default icon being displayed for specified folders

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.LoadIcon ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\week.ico`)"),1234
		With .FileTypes.Add("W*")
			.Folder = True
			.IconIndex = 1234
			.Bold = True
			.Apply 
		End With
	End With
End Function
</SCRIPT>
</BODY>

41
How can I change the default icon being displayed for specified files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.LoadIcon ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\week.ico`)"),1234
		With .FileTypes.Add("*.bat *.com *.exe")
			.IconIndex = 1234
			.Apply 
		End With
	End With
End Function
</SCRIPT>
</BODY>

40
How can I change the default icon being displayed for files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.LoadIcon ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\week.ico`)"),1234
		With .FileTypes.Add("*")
			.IconIndex = 1234
			.Apply 
		End With
	End With
End Function
</SCRIPT>
</BODY>

39
How can I change the default icon being displayed for folders

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.LoadIcon ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\week.ico`)"),1234
		With .FileTypes.Add("*")
			.Folder = True
			.IconIndex = 1234
			.Apply 
		End With
	End With
End Function
</SCRIPT>
</BODY>

38
Does your control support partial check feature, so a parent item gets checked when all its child items are checked

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.HasCheckBox = 1
		.ExpandFolders = True
	End With
End Function
</SCRIPT>
</BODY>

37
Can I add a checkbox to each file or folder

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.HasCheckBox = -1
	End With
End Function
</SCRIPT>
</BODY>

36
How do I put a picture on the center of the control

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 17
	End With
End Function
</SCRIPT>
</BODY>

35
How do I resize/stretch a picture on the control's background

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 49
	End With
End Function
</SCRIPT>
</BODY>

34
How do I put a picture on the control's center right bottom side

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 34
	End With
End Function
</SCRIPT>
</BODY>

33
How do I put a picture on the control's center left bottom side

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 32
	End With
End Function
</SCRIPT>
</BODY>

32
How do I put a picture on the control's center top side

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 1
	End With
End Function
</SCRIPT>
</BODY>

31
How do I put a picture on the control's right top corner

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 2
	End With
End Function
</SCRIPT>
</BODY>

30
How do I put a picture on the control's left top corner

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
		.PictureDisplay = 0
	End With
End Function
</SCRIPT>
</BODY>

29
How do I put a picture on the control's background

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Picture = ExFileView1.ExecuteTemplate("loadpicture(`c:\exontrol\images\zipdisk.gif`)")
	End With
End Function
</SCRIPT>
</BODY>

28
How do I change the control's border, using your EBN files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\hot.ebn"
		.Appearance = 16777216 ' &H1000000
		.BackColor = RGB(255,255,255)
	End With
End Function
</SCRIPT>
</BODY>

27
How do I remove the control's border

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Appearance = 0
	End With
End Function
</SCRIPT>
</BODY>

26
How can I change the foreground color of the control's header

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ForeColorHeader = RGB(255,0,0)
	End With
End Function
</SCRIPT>
</BODY>

25
How can I change the background color of the control's header

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.BackColorHeader = RGB(255,255,0)
		.HeaderAppearance = 1
	End With
End Function
</SCRIPT>
</BODY>

24
How can I change the visual appearance of the header, using EBN files

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.BackColorHeader = &H1000000
	End With
End Function
</SCRIPT>
</BODY>

23
How can I change the header's appearance

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.HeaderAppearance = 1
	End With
End Function
</SCRIPT>
</BODY>

22
How do I disable the control
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Enabled = False
	End With
End Function
</SCRIPT>
</BODY>

21
How do I change the visual appearance effect for the selected item, using EBN

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.SelBackColor = &H1000000
		.SelForeColor = RGB(0,0,0)
	End With
End Function
</SCRIPT>
</BODY>

20
How do I change the colors for the selected item

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.SelBackColor = RGB(0,0,0)
	End With
End Function
</SCRIPT>
</BODY>

19
How can I change the control's font

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Font.Name = "Tahoma"
	End With
End Function
</SCRIPT>
</BODY>

18
How do I show or hide the control's header bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.HeaderVisible = False
	End With
End Function
</SCRIPT>
</BODY>

17
How do I change the control's foreground color

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ForeColor = RGB(120,120,120)
	End With
End Function
</SCRIPT>
</BODY>

16
How do I change the control's background color

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.BackColor = RGB(200,200,200)
	End With
End Function
</SCRIPT>
</BODY>

15
How do I prevent painting the control while multiple changes occur
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.BeginUpdate 
		.ForeColor = RGB(255,0,0)
		.BackColor = RGB(255,255,255)
		.EndUpdate 
	End With
End Function
</SCRIPT>
</BODY>

14
How do I change the height of the items

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.DefaultItemHeight = 13
		.Refresh 
	End With
End Function
</SCRIPT>
</BODY>

13
How do I enable resizing the columns at runtime

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ColumnsAllowSizing = True
	End With
End Function
</SCRIPT>
</BODY>

12
How do I call your x-script language

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ExecuteTemplate "BackColor = RGB(255,0,0)"
	End With
End Function
</SCRIPT>
</BODY>

11
How do I call your x-script language

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Template = "BackColor = RGB(255,0,0)"
	End With
End Function
</SCRIPT>
</BODY>

10
Can I change the order of the buttons in the scroll bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollOrderParts(1) = "t,l,r"
		.ScrollOrderParts(0) = "t,l,r"
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

9
The thumb size seems to be very small. Can I make it bigger

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollThumbSize(1) = 64
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

8
How do I enlarge or change the size of the control's scrollbars

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollHeight = 18
		.ScrollWidth = 18
		.ScrollButtonWidth = 18
		.ScrollButtonHeight = 18
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

7
How do I assign a tooltip to a scrollbar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollToolTip(1) = "This is a tooltip being shown when you click and drag the thumb in the vetrical scroll bar"
		.ScrollPartCaption(1,256) = "This is just a text"
		.ScrollFont(0).Size = 12
		.ScrollWidth = 20
		.ScrollThumbSize(0) = 148
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

6
I need to add a button in the scroll bar. Is this possible

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollPartVisible(1,32768) = True
		.ScrollPartCaption(1,32768) = "1"
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

5
Can I display an additional buttons in the scroll bar

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.ScrollPartVisible(1,32768) = True
		.ScrollPartVisible(1,16384) = True
		.ScrollPartVisible(1,1) = True
		.ScrollPartVisible(1,2) = True
		.ColumnAutoResize = False
		.ColumnWidth("Name") = 256
	End With
End Function
</SCRIPT>
</BODY>

4
Is there any option to highligth the column from the cursor - point
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.Background(32) = RGB(255,255,255)
	End With
End Function
</SCRIPT>
</BODY>

3
Is there any option to highligth the column from the cursor - point
<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.Background(32) = &H1000000
	End With
End Function
</SCRIPT>
</BODY>

2
How do I change the visual aspect of the close button in the filter bar, using EBN

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.Background(1) = &H1000000
		.ColumnFilterButton("Name") = True
		.ColumnFilterType("Name") = 1
		.ColumnFilter("Name") = "*.exe"
		.ApplyFilter 
	End With
End Function
</SCRIPT>
</BODY>

1
How do I change the visual aspect of the drop down filter button, using EBN

<BODY onload="Init()">
<OBJECT CLASSID="clsid:F26C97E5-3E86-4CE4-935B-A997AB3DDBE4" id="ExFileView1"></OBJECT>

<SCRIPT LANGUAGE="VBScript">
Function Init()
	With ExFileView1
		.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
		.Background(0) = &H1000000
		.ColumnFilterButton("Name") = True
	End With
End Function
</SCRIPT>
</BODY>